<?php
  $member = 'Anon'; //!
  $filename = 'copy/'.$member.'_'.date('YmdHis').'.txt';
  if(file_exists($filename)) {
    echo 'Cannot create file ($filename)';
    exit;
  }
  if(!$handle = fopen($filename,'x')) {
    echo 'Cannot open file ($filename)';
    exit;
  }
  if(fwrite($handle,$message) === FALSE) {
    echo 'Cannot write to file ($filename)';
    exit;
  }
  fclose($handle);

  if($deliver=='file') {
    echo '<OK>'.$filename;
  }
  else {
    $res = mail_attachment('donotreply@trixmoto.net',$deliver,'MMVBS Form Creator','Here is the source code for your form.\n\nRegards, Trixmoto', $filename);
    if(!$res) {
      echo 'Email could not be sent ($email)';
      exit;
    }
    echo '<OK>@Email successfully sent ('.$deliver.')';
  }

  function mail_attachment ($from , $to, $subject, $message, $attachment){
	$fileatt = $attachment;
	$fileatt_type = "application/octet-stream";
    $start = strrpos($attachment, '/') == -1 ? strrpos($attachment, '//') : strrpos($attachment, '/')+1;
	$fileatt_name = substr($attachment, $start, strlen($attachment));

	$email_from = $from;
	$email_subject =  $subject;
	$email_txt = $message;
	$email_to = $to;

	$headers = "From: ".$email_from;

	$file = fopen($fileatt,'rb');
	$data = fread($file,filesize($fileatt));
	fclose($file);

	$semi_rand = md5(time());
	$mime_boundary = "==Multipart_Boundary_x{$semi_rand}x";

	$headers .= "\nMIME-Version: 1.0\n"."Content-Type: multipart/mixed;\n"." boundary=\"{$mime_boundary}\"";

	$email_txt .= $msg_txt;

	$email_message .= "This is a multi-part message in MIME format.\n\n" .
                "--{$mime_boundary}\n" .
                "Content-Type:text/html; charset=\"iso-8859-1\"\n" .
               "Content-Transfer-Encoding: 7bit\n\n" .
	$email_txt . "\n\n";

	$data = chunk_split(base64_encode($data));

	$email_message .= "--{$mime_boundary}\n" .
                  "Content-Type: {$fileatt_type};\n" .
                  " name=\"{$fileatt_name}\"\n" .
                  //"Content-Disposition: attachment;\n" .
                  //" filename=\"{$fileatt_name}\"\n" .
                  "Content-Transfer-Encoding: base64\n\n" .
                 $data . "\n\n" .
                  "--{$mime_boundary}--\n";


	$ok = @mail($email_to, $email_subject, $email_message, $headers);
    return $ok;
  }
?>